写一个Double扩展数据

[helpstring("method SetxDataDouble")]
HRESULT SetxDataDouble([in] BSTR sAppName, [in] LONG lItem, [in] DOUBLE val, [out, retval] VARIANT_BOOL* pOk);